← Index
NYTProf Performance Profile   
For ../prof.pl
  Run on Wed Dec 14 16:10:05 2022
Reported on Wed Dec 14 16:12:57 2022

Filename(eval 136)[/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Eval/TypeTiny.pm:8]
StatementsExecuted 6 statements in 144µs
Eval Invoked At/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Eval/TypeTiny.pm line 8
Sibling evals1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
1117µs51µsEval::TypeTiny::Sandbox::::BEGIN@3.59Eval::TypeTiny::Sandbox::BEGIN@3.59
1114µs37µsType::Tiny::::BEGIN@3.60 Type::Tiny::BEGIN@3.60
1112µs2µsEval::TypeTiny::Sandbox::::__ANON__[:4]Eval::TypeTiny::Sandbox::__ANON__[:4]
0000s0sEval::TypeTiny::Sandbox::::__ANON__[:3]Eval::TypeTiny::Sandbox::__ANON__[:3]
0000s0sTypes::Standard::::assert_OptList Types::Standard::assert_OptList
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1package Eval::TypeTiny::Sandbox;
2
# spent 2µs within Eval::TypeTiny::Sandbox::__ANON__[(eval 136)[/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Eval/TypeTiny.pm:8]:4] which was called: # once (2µs+0s) by Eval::TypeTiny::eval_closure at line 248 of Eval/TypeTiny.pm
sub {
34138µs4165µs
# spent 37µs (4+33) within Type::Tiny::BEGIN@3.60 which was called: # once (4µs+33µs) by Eval::TypeTiny::_clean_eval at line 3 # spent 51µs (7+44) within Eval::TypeTiny::Sandbox::BEGIN@3.59 which was called: # once (7µs+44µs) by Eval::TypeTiny::_clean_eval at line 3
sub { no warnings "void"; package Type::Tiny; ((((Ref::Util::XS::is_plain_arrayref($_[0]))) && (do { my $ok = 1; for my $inner (@{$_[0]}) { no warnings; ($ok=0) && last unless ref($inner) eq q(ARRAY) && @$inner == 2 && (do { package Type::Tiny; defined($inner->[0]) and do { ref(\$inner->[0]) eq 'SCALAR' or ref(\(my $val = $inner->[0])) eq 'SCALAR' } }); } $ok }))) or Type::Tiny::_failed_check(34, "OptList", $_[0], ); $_[0] }
# spent 77µs making 2 calls to warnings::unimport, avg 38µs/call # spent 51µs making 1 call to Eval::TypeTiny::Sandbox::BEGIN@3.59 # spent 37µs making 1 call to Type::Tiny::BEGIN@3.60
426µs}
5;